/**
 * Copyright (c) 2017 Saleem Rashid
 *
 * Permission is hereby granted, free of charge, to any person obtaining
 * a copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included
 * in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES
 * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 * OTHER DEALINGS IN THE SOFTWARE.
 */

#include "hasher.h"
#include "ripemd160.h"

const uint32_t sha256_initial_tapsighash_state[8] = {
    0xf504a425UL,
    0xd7f8783bUL,
    0x1363868aUL,
    0xe3e55658UL,
    0x6eee945dUL,
    0xbc7888ddUL,
    0x02a6e2c3UL,
    0x1873fe9fUL,
};

void hasher_InitParam(Hasher* hasher, HasherType type, const void* param, uint32_t param_size) {
    hasher->type = type;
    hasher->param = param;
    hasher->param_size = param_size;

    switch(hasher->type) {
    case HASHER_SHA2:
    case HASHER_SHA2D:
    case HASHER_SHA2_RIPEMD:
        sha256_Init(&hasher->ctx.sha2);
        break;
    case HASHER_SHA2_TAPSIGHASH:
        sha256_Init_ex(&hasher->ctx.sha2, sha256_initial_tapsighash_state, 512);
        break;
    case HASHER_SHA3:
#if USE_KECCAK
    case HASHER_SHA3K:
#endif
        sha3_256_Init(&hasher->ctx.sha3);
        break;
    case HASHER_BLAKE:
    case HASHER_BLAKED:
    case HASHER_BLAKE_RIPEMD:
        blake256_Init(&hasher->ctx.blake);
        break;
    case HASHER_GROESTLD_TRUNC:
        groestl512_Init(&hasher->ctx.groestl);
        break;
    case HASHER_BLAKE2B:
        blake2b_Init(&hasher->ctx.blake2b, 32);
        break;
    case HASHER_BLAKE2B_PERSONAL:
        blake2b_InitPersonal(&hasher->ctx.blake2b, 32, hasher->param, hasher->param_size);
        break;
    }
}

void hasher_Init(Hasher* hasher, HasherType type) {
    hasher_InitParam(hasher, type, NULL, 0);
}

void hasher_Reset(Hasher* hasher) {
    hasher_InitParam(hasher, hasher->type, hasher->param, hasher->param_size);
}

void hasher_Update(Hasher* hasher, const uint8_t* data, size_t length) {
    switch(hasher->type) {
    case HASHER_SHA2:
    case HASHER_SHA2D:
    case HASHER_SHA2_RIPEMD:
    case HASHER_SHA2_TAPSIGHASH:
        sha256_Update(&hasher->ctx.sha2, data, length);
        break;
    case HASHER_SHA3:
#if USE_KECCAK
    case HASHER_SHA3K:
#endif
        sha3_Update(&hasher->ctx.sha3, data, length);
        break;
    case HASHER_BLAKE:
    case HASHER_BLAKED:
    case HASHER_BLAKE_RIPEMD:
        blake256_Update(&hasher->ctx.blake, data, length);
        break;
    case HASHER_GROESTLD_TRUNC:
        groestl512_Update(&hasher->ctx.groestl, data, length);
        break;
    case HASHER_BLAKE2B:
    case HASHER_BLAKE2B_PERSONAL:
        blake2b_Update(&hasher->ctx.blake2b, data, length);
        break;
    }
}

void hasher_Final(Hasher* hasher, uint8_t hash[HASHER_DIGEST_LENGTH]) {
    switch(hasher->type) {
    case HASHER_SHA2:
    case HASHER_SHA2_TAPSIGHASH:
        sha256_Final(&hasher->ctx.sha2, hash);
        break;
    case HASHER_SHA2D:
        sha256_Final(&hasher->ctx.sha2, hash);
        hasher_Raw(HASHER_SHA2, hash, HASHER_DIGEST_LENGTH, hash);
        break;
    case HASHER_SHA2_RIPEMD:
        sha256_Final(&hasher->ctx.sha2, hash);
        ripemd160(hash, HASHER_DIGEST_LENGTH, hash);
        break;
    case HASHER_SHA3:
        sha3_Final(&hasher->ctx.sha3, hash);
        break;
#if USE_KECCAK
    case HASHER_SHA3K:
        keccak_Final(&hasher->ctx.sha3, hash);
        break;
#endif
    case HASHER_BLAKE:
        blake256_Final(&hasher->ctx.blake, hash);
        break;
    case HASHER_BLAKED:
        blake256_Final(&hasher->ctx.blake, hash);
        hasher_Raw(HASHER_BLAKE, hash, HASHER_DIGEST_LENGTH, hash);
        break;
    case HASHER_BLAKE_RIPEMD:
        blake256_Final(&hasher->ctx.blake, hash);
        ripemd160(hash, HASHER_DIGEST_LENGTH, hash);
        break;
    case HASHER_GROESTLD_TRUNC:
        groestl512_DoubleTrunc(&hasher->ctx.groestl, hash);
        break;
    case HASHER_BLAKE2B:
    case HASHER_BLAKE2B_PERSONAL:
        blake2b_Final(&hasher->ctx.blake2b, hash, 32);
        break;
    }
}

void hasher_Raw(
    HasherType type,
    const uint8_t* data,
    size_t length,
    uint8_t hash[HASHER_DIGEST_LENGTH]) {
    Hasher hasher = {0};

    hasher_Init(&hasher, type);
    hasher_Update(&hasher, data, length);
    hasher_Final(&hasher, hash);
}
